object Fconvertediario: TFconvertediario
  Left = 200
  Top = 106
  Width = 819
  Height = 622
  Caption = 'Conversao do Diario'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object DBGrid1: TDBGrid
    Left = 4
    Top = 60
    Width = 785
    Height = 469
    DataSource = DataSource2
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'Lancamento'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Data'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Credora'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Devedora'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Hp'
        Width = 34
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Complemento'
        Width = 375
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Valor'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'Usuario'
        Visible = True
      end>
  end
  object BitBtn1: TBitBtn
    Left = 656
    Top = 4
    Width = 75
    Height = 25
    Caption = 'Converter'
    TabOrder = 1
    OnClick = BitBtn1Click
  end
  object BitBtn2: TBitBtn
    Left = 732
    Top = 4
    Width = 75
    Height = 25
    Caption = '&Sair'
    TabOrder = 2
    OnClick = BitBtn2Click
  end
  object diariodbf: TTable
    DatabaseName = 'gomide'
    Exclusive = True
    TableName = 'MOVITO.DBF'
    Left = 4
    Top = 32
    object diariodbfDATALA: TDateField
      FieldName = 'DATALA'
    end
    object diariodbfDEVEDO: TSmallintField
      FieldName = 'DEVEDO'
    end
    object diariodbfCREDOR: TSmallintField
      FieldName = 'CREDOR'
    end
    object diariodbfHPLANC: TSmallintField
      FieldName = 'HPLANC'
    end
    object diariodbfCOMPLE: TStringField
      FieldName = 'COMPLE'
      Size = 35
    end
    object diariodbfVALORL: TFloatField
      FieldName = 'VALORL'
    end
    object diariodbfMESANO: TStringField
      FieldName = 'MESANO'
      Size = 7
    end
    object diariodbfOPERADOR: TStringField
      FieldName = 'OPERADOR'
      Size = 10
    end
  end
  object DataSource2: TDataSource
    DataSet = diariopa
    Left = 32
    Top = 4
  end
  object diariopa: TTable
    DatabaseName = 'gomide'
    Exclusive = True
    TableName = 'diario.db'
    Left = 36
    Top = 32
    object diariopaData: TDateField
      FieldName = 'Data'
    end
    object diariopaLancamento: TFloatField
      FieldName = 'Lancamento'
    end
    object diariopaCredora: TStringField
      FieldName = 'Credora'
      Size = 6
    end
    object diariopaDevedora: TStringField
      FieldName = 'Devedora'
      Size = 6
    end
    object diariopaHp: TFloatField
      FieldName = 'Hp'
    end
    object diariopaComplemento: TStringField
      FieldName = 'Complemento'
      Size = 240
    end
    object diariopaValor: TFloatField
      FieldName = 'Valor'
      DisplayFormat = '##,##0.00'
      EditFormat = '##,##0.00'
    end
    object diariopaUsuario: TStringField
      FieldName = 'Usuario'
      Size = 10
    end
    object diariopaReferencia: TStringField
      FieldName = 'Referencia'
      Size = 7
    end
    object diariopaConsolidado: TBooleanField
      FieldName = 'Consolidado'
    end
  end
  object DataSource1: TDataSource
    DataSet = diariodbf
    Left = 4
    Top = 4
  end
end
